home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1989 …il & Dave's Excellent CD / Excellent CD HFS.raw / Moof / Goodies / DTS Goodies / Hardware Hints / BoardId Registration / card_6977.txt < prev    next >
Encoding:
Text File  |  1989-04-24  |  3.8 KB  |  177 lines
  1. -- card: 6977 from stack: in
  2. -- bmap block id: 14107
  3. -- flags: 0000
  4. -- background id: 2566
  5. -- name: DriverinROMCard
  6. ----- HyperTalk script -----
  7. On OpenCard
  8.   global CatValue, TypValue, DrSwValue, DrAtAllValue, DrAppleValue, VirginValue
  9.   get VirginValue
  10.   if it is empty then
  11.     set hilite of button "Yes" to false
  12.     set hilite of button "No" to false
  13.     clearDrs
  14.   else
  15.     get TypValue
  16.     if it is empty then
  17.       set hilite of button "Yes" to false
  18.       set hilite of button "No" to false
  19.       clearDrs
  20.     else
  21.       get DrSwValue
  22.       if it is empty then
  23.         set hilite of button "Yes" to false
  24.         set hilite of button "No" to false
  25.         clearDrs
  26.       end if
  27.     end if
  28.   end if
  29.   pass openCard
  30. End OpenCard
  31.  
  32.  
  33.  
  34. -- part 1 (button)
  35. -- low flags: 00
  36. -- high flags: A006
  37. -- rect: left=32 top=35 right=53 bottom=78
  38. -- title width / last selected line: 0
  39. -- icon id / first selected line: 0 / 0
  40. -- text alignment: 1
  41. -- font id: 0
  42. -- text size: 12
  43. -- style flags: 0
  44. -- line height: 16
  45. -- part name: Yes
  46. ----- HyperTalk script -----
  47. on mouseUp
  48.   global CatValue, TypValue, DrSwValue, DrAtAllValue, DrAppleValue, VirginValue
  49.   set hilite of button "Yes" to true
  50.   set hilite of button "No" to false
  51.   --show a field and buttons to ask if apple driver?
  52.   put "Dr in ROM - Yes" into DrSwValue
  53.   put "DrInROM" into VirginValue -- close stack will write global
  54.   push card
  55.   go card "DriverAppleCard"
  56. end mouseUp
  57.  
  58.  
  59.  
  60. -- part 2 (button)
  61. -- low flags: 00
  62. -- high flags: E006
  63. -- rect: left=32 top=63 right=81 bottom=77
  64. -- title width / last selected line: 0
  65. -- icon id / first selected line: 0 / 0
  66. -- text alignment: 1
  67. -- font id: 0
  68. -- text size: 12
  69. -- style flags: 0
  70. -- line height: 16
  71. -- part name: No
  72. ----- HyperTalk script -----
  73. on mouseUp
  74.   global CatValue, TypValue, DrSwValue, DrAtAllValue, DrAppleValue, VirginValue
  75.   set hilite of button "Yes" to false
  76.   set hilite of button "No" to true
  77.   put "Dr in ROM - No" into DrSwValue
  78.   put "DrNOTInROM" into VirginValue -- close stack will write global
  79.   push card
  80.   go card "DriverAppleCard"
  81. end mouseUp
  82.  
  83.  
  84.  
  85. -- part 7 (field)
  86. -- low flags: 00
  87. -- high flags: 0004
  88. -- rect: left=15 top=12 right=31 bottom=153
  89. -- title width / last selected line: 0
  90. -- icon id / first selected line: 0 / 0
  91. -- text alignment: 0
  92. -- font id: 20
  93. -- text size: 12
  94. -- style flags: 0
  95. -- line height: 16
  96. -- part name: 
  97.  
  98.  
  99. -- part 17 (button)
  100. -- low flags: 00
  101. -- high flags: 2000
  102. -- rect: left=160 top=295 right=340 bottom=217
  103. -- title width / last selected line: 0
  104. -- icon id / first selected line: 1012 / 1012
  105. -- text alignment: 1
  106. -- font id: 0
  107. -- text size: 12
  108. -- style flags: 0
  109. -- line height: 16
  110. -- part name: popbutton
  111. ----- HyperTalk script -----
  112. on mouseUp
  113.   pop card
  114. end mouseUp
  115.  
  116.  
  117.  
  118. -- part 18 (button)
  119. -- low flags: 00
  120. -- high flags: 2000
  121. -- rect: left=398 top=298 right=337 bottom=440
  122. -- title width / last selected line: 0
  123. -- icon id / first selected line: 23078 / 23078
  124. -- text alignment: 1
  125. -- font id: 0
  126. -- text size: 12
  127. -- style flags: 0
  128. -- line height: 16
  129. -- part name: HelpButton
  130. ----- HyperTalk script -----
  131. on mouseUp
  132.   --should be on each card, not in background
  133.   push card
  134.   go to card "Help-Drivers"
  135. end mouseUp
  136.  
  137.  
  138.  
  139. -- part 19 (button)
  140. -- low flags: 00
  141. -- high flags: A000
  142. -- rect: left=449 top=289 right=337 bottom=507
  143. -- title width / last selected line: 0
  144. -- icon id / first selected line: 1 / 1
  145. -- text alignment: 1
  146. -- font id: 0
  147. -- text size: 12
  148. -- style flags: 0
  149. -- line height: 16
  150. -- part name: Tutorial
  151. ----- HyperTalk script -----
  152. on mouseUp
  153.   push card
  154.   go to card "Tutorial intro cd 01"
  155. end mouseUp
  156.  
  157.  
  158.  
  159. -- part contents for card part 7
  160. ----- text -----
  161. Will the driver be in ROM?
  162.  
  163. -- part contents for background part 44
  164. ----- text -----
  165. Display
  166.  
  167. -- part contents for background part 48
  168. ----- text -----
  169. Y dr in ROM
  170.  
  171. -- part contents for background part 47
  172. ----- text -----
  173. Video
  174.  
  175. -- part contents for background part 49
  176. ----- text -----
  177. Yes-Dr